use "/Users/Enrijeta/Dropbox/Hood et al. Registered Indies/SPPQ/SPPQ_replication/pooled/nc_sppq1.dta", clear
append using "/Users/Enrijeta/Dropbox/Hood et al. Registered Indies/SPPQ/SPPQ_replication/pooled/fl_sppq1.dta"
save "/Users/Enrijeta/Dropbox/Hood et al. Registered Indies/SPPQ/SPPQ_replication/pooled/nc_fl_combined.dta", replace



* Model 5 (Pooled Full model)
logistic reg_npa_vf age2 female white education2 moveto_state regyear_length ///
    talk_politics shareviews_politics likeminded_politics vote_primary vote_primary_imp2 ///
    pol_engagement5 pol_interest2 ideo_strength pid_strength_cat4 fl_state ///
    [pweight=weight], vce(cluster countycode1)

eststo m1_fullp


* Export results to Excel
estout m1_fullp using model04511101.txt, cells(b(star fmt(3)) ///
se(par fmt(3))) stats(chi2 loglikelihood N aic bic, fmt(3 0 1) label(WaldX2 Log N aic bic)) ///
varlabels(_cons "Intercept" ///
age2 "Age" female "Female" white "White non-Hispanic" education2 "Education" ///
student "Student" moveto_state "Moved to North Carolina" ///
pol_engagement5 "Political engagement" pid_strength_cat4 "PID strength (pure to strong partisan)" ///
pol_interest2 "Political interest" ideo_strength "Ideology strength (no strong ideologue)" regyear_length "Registration length" ///
talk_politics "Talk politics (difficult)" shareviews_politics "Share views on politics (difficult)" likeminded_politics "Surrounded by like minded people" ///
vote_primary "Vote in primary (usually)" vote_primary_imp2 "Voting in primary is important" fl_state "Florida") 



* Calculate predicted probabilities for the model
margins, at(female=(0 1))
margins, at(regyear_length=(0 5 10 35))
margins, at(vote_primary=(0 1))
margins, at(fl_state=(0 1))



margins, at(pid_strength_cat4=(1 2 3 4))
